perm filename PUB.LOG[2,TES]3 blob sn#030672 filedate 1973-03-08 generic text, type T, neo UTF8
00100	8 MARCH 1973 TES
00200	
00300	New PUB put up a couple of days ago.  Here is a summary of changes
00400	from the implementor's viewpoint (see NEWS for user's viewpoint).
00500	This is designed to be a guide when examining a SRCCOM.
00600	
00700	PUB.SAI
00800		ERRLINE, WARN
00900			Simulate SAIL progress reports
01000			INTEGER SWDBACK described in PUBDFS.SAI
01100		ANYSTART
01200			SCAN(M,1,DUMMY) drops superfluous blanks
01300				from file name for progress report
01400			BRC="P" case: Ignore /PUB switch (see RPGSTART)
01500		RPGSTART
01600			We now read QQSVCM.RPG instead of QQPUB.RPG
01700				because from the latter RPG was
01800				throwing away output file extension!
01900		SCREATE,SGREM,ZEROWORDS,ZEROSTRINGS,SGROW
02000			These changes were made months ago to accomodate
02100				the way new SAIL handles dynamic arrays.
02200		GROWNESTS,GROWOWLS
02300			DUMMY ← 0 corrects a spurious error message bug
02400		SWICHBACK,SWICHF
02500			Changed for new-style progress reports
02600		SEND
02700			ASSUREAREA omission found by RKJ at CMU
02800		ALFIZE
02900			Not changed, but note that SEND INDEX
03000				templates are restricted to one line
03100				because LF is the entry delimiter
03200		FIND_CHR, TURN
03300			Changes to allow:
03400				TURN ON/OFF TAB (see NEWS)
03500				Several characters to be turned on
03600					for left brace at one time
03700		ENDBLOCK
03800			1/18 fix: RESPTYPE case 2: Signals in blocks.
03900			MODETYPE: fixes GROUP BEGIN...END
04000			OPENAREA: a futile attempt to catch the
04100				infinite loop caused by areas that
04200				start at CHAR>1.
04300			CVALF: Roman numerals (found by RKJ at CMU).
04400		FIND_ROOM
04500			IF FROMCOL>COLS THEN FOOTTOP←1 ; (RKJ AT CMU)
04600		PLACELINE
04700			IF FOOTNUM OR FOOTTOP AND COL>COLS THEN -(RKJ)
04800		INITIALIZATION
04900			All calls on SAT now gone (see SCREATE above)
05000			Control characters: added "$", LCURLY, DOLLAR.
05100			FAMILYHAS: replaced CURLYQ by DOLLARQ (see PASS).
05200			ODD-EVEN-MAX-MIN: added MOD, fixed DPB bug (RKJ)
05300			THISFILE,MAINFILE: progress report change.
05400			DEFN_BRC: added $ and ) for alternate horseshoes.
05500			DEFN_BRCS: allows several chars to mean left brace.
05600			EPSCHAR: eliminated, replaced by DEFN_BRCS.
05700			SETBREAK(TO_COMMA_RPAR..): eliminated vertical
05800				bar from omitted characters.
05900			Omitted P U B   P A S S   O N E message(see SWICHF)
06000			PUBSTD←TRUE: suppresses progress reports on PUBSTD.DFS
06100			DSKPPN instead of GETPPN new SU UUO for ALIAS 2,TES.
06200	
06300	PARSER.SAI
06400		RD
06500			END "PGMARK": changes progress reporting (see SWICHF)
06600			BEGIN "EXPAND TABS": allows TURN ON TAB
06700		PASS
06800			ie 1... Changes $( to left horseshoe in command mode.
06900				NOTE: Unpublished feature eliminated wherein
07000				{...} in expressions were side effects.
07100			ie 4... Changes ]$ to right brace in command mode.
07200		E
07300			IF OROP < 0 ... (ANY ← ALL) :Fixes IF FALSE AND TRUE.
07400		DEFN
07500			Allows $( and )$ for horseshoe substitutes.
07600			Allows $[ or equivalent and ]$ for brace substitutes.
07700		DBLANKPAGE
07800			Implements BLANK PAGE N command (see NEWS)
07900		DLOCAL
08000			Fixes VARIABLE declarations.
08100		DPORTION
08200			Fixed blowup when INSERT...PORTION...RECEIVE occurred
08300				but no SEND's.
08400		DTABS
08500			IF ON ... Fixes IF FALSE THEN TABS ...
08600		DTURN
08700			Allows TURN ON/OFF TAB.
08800			Checks for unequal length operands of FOR.
08900		CHECK_CONSISTENCY in LABELDEF
09000			Wasn't checking consistency of P-values.
09100		COMMAND
09200			BLANK PAGE added
09300	
09400	FILLER.SAI
09500		EMIT
09600			1/9/73 fix: LASTWDBRK=OAKS disambiguates two uses
09700				of altmode (damnit).
09800		SIGNA
09900			1/9/73 fix: IF ON THEN LAST←LAST+ARGS, fix bug.
10000		PROCESS
10100			ie 18... POSN≤MAXIM instead of < to fix bug.
10200				 EMIT("_") so TURN ON .. FOR "_" works.
10300			ie 23... Treats $[ or equivalent as left brace.
10400		TEXTLINE
10500			ie 1... LEN←CVD(E("5",0)) ; Thanks to RKJ.
10600			ITS changed to ITSCH wherever possible for speed (ha).
10700			ie 3... Fixes $["Unit!" Label]$ bug.
10800	
10900	PUBDFS.SAI
11000		BBPP replaced by POINT for IXWD and friends to fix bug
11100			in which COUNT PAGE and AREA TEXT could not be
11200			declared inside blocks since New SAIL came up.
11300		MODEWDS
11400			Add TABTAB
11500		Table of Character Families and Species
11600			Reformatted to line up columns.
11700			Replaced CURLYQ by DOLLARQ (see PASS).
11800		TERNAL INTEGER
11900			Added SWDBACK and PUBSTD for progress reports.
12000			Added DEFN_BRCS to allow multiple chars to mean
12100				left brace.  Should have got rid of EPSCHAR.
12200	
12300	PUB2.SAI
12400		Changed LPT tests to eliminate initial blank page.
12500		Shortened Progress Report message.
12600	
12700	PUBPRO.SAI
12800		Added a function.
12900	
13000	PUBSTD.DFS
13100		SINGLE SPACE etc. now break before changing SPREAD.
13200	
13300	
13400	********************